home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / id001.dxr / 00040.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  568 b   |  30 lines
  1. on exitFrame
  2.   global flag, cowboy3
  3.   if flag = 1 then
  4.     if the timer > 120 then
  5.       set flag to 0
  6.     end if
  7.   else
  8.     if flag = 0 then
  9.       repeat while the locV of sprite 5 < 550
  10.         set the locV of sprite 5 to the locV of sprite 5 + 10
  11.         updateStage()
  12.       end repeat
  13.       set the visible of sprite 5 to 0
  14.       set flag to 1
  15.       set cowboy3 to 0
  16.       go(65)
  17.     end if
  18.   end if
  19.   go(the frame)
  20. end
  21.  
  22. on mouseUp
  23.   repeat with n = 21 down to 1
  24.     set the visible of sprite n to 1
  25.     puppetSprite(n, 0)
  26.   end repeat
  27.   sound stop 1
  28.   go(10)
  29. end
  30.